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gure 1 : prior art VHDL listing 



LIBRARY ieee; 

USE ieee.std_logic_1 1 64.ALL; 
USE ieee.std logic arith. ALU- 



ENTITY test IS 
PORT( 



100 

/ 



elk : IN stdlogic; 

rst : IN stdlogic; 

in 1 : IN unsigned(7 downto 0); 

in2 : IN unsigned(7 downto 0); 

out1 : OUT unsigned(7 downto 0) 



); 



END; 



ARCHITECTURE behavioral OF test IS 
BEGIN 

main : PROCESS 

VARIABLE mini : unsigned(7 downto 0); 
VARIABLE min2 : unsigned(7 downto 0); 

BEGIN 

WAIT UNTIL (clk'EVENT and elk = "V); 
mini : = in1 ; 
min2 : = in2; 

loopl : WHILE ( mini < min2 ) LOOP 
IF (min2 > 0) THEN 

FOR x IN 0 TO 7 LOOP 

mini : = mini + min2; 
min2 : = min2 -1 ; 
LEND LOOP; 



110 



120 



130 



ELSE 



140 r FOR x IN 10 DOWNTO 5 LOOP 
mini : = mini - x; 

Lend loop; 

END IF; 
_ END LOOP; 

out1 < = mini * min2; 
END PROCESS; 



END; 
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